Test FAMS on 5D data
Contents
randomize data
max_uniform=100;
vect1 = rand(1000,5)*max_uniform;
sigma2=[0.1,0.3,0.1,0.3,0.2];
mu2=[70,60,70,55,89];
vect2 = randn(120,5)*max_uniform/10;
vect2 = vect2.*repmat(sigma2,size(vect2,1),1)+repmat(mu2,size(vect2,1),1);
sigma3=[0.1,0.3,0.1,0.3,0.2];
mu3=[20,10,15,55,9];
vect3 = randn(100,5)*max_uniform/10;
vect3 = vect3.*repmat(sigma3,size(vect3,1),1)+repmat(mu3,size(vect3,1),1);
data=[vect1; vect2; vect3];
run FAMS
[modes, p_modes, w_modes]=fams(data,20,15,200,'5Ddata','res/');
Load data points from matlab ...done
RunFAMS with res/pilot_200_5Ddata.txt ...
Running FAMS with K=20 L=15
Run pilot adaptive...load bandwidths...done.
Start MS iterations..........done.
Join Modes with adaptive h/2, min pt=40, jump=1
pass 1.done
pass 2..........nrel 2
0 0
1 1
done
Save convergence points ...done
Save joined convergence points ...done
Save indicies of modes ...done
FAMS done.
view results
p_modes
p_modes =
140 69.994 59.828 70.092 55.548 88.905
135 19.98 10.137 15.159 55.244 8.9565